
/* This file contains Stata commands to replicate the model results presented in Table 2 of Blackstone and Oldmixon's "Discourse and Dissonance."
 */

 
 use Blackstone_Oldmixon_Speech_Data_1995.dta


* MODEL 1--CULTURE
zip culture  i.MCreligion i.relsalience i.MCreligion##i.relsalience catholic evan, inflate(dwnom1 serviceyears sex vote partyldr) vuong
	
	* Calculate average marginal effects for all covariates
	margins, dydx(*)
	
* MODEL 2--SOCIAL WELFARE
zip socialwelfare  i.MCreligion i.relsalience i.MCreligion##i.relsalience catholic evan, inflate(dwnom1 serviceyears sex vote partyldr) vuong
	* Calculate average marginal effects for all covariates
	margins, dydx(*)

  	* Calculate average marginal effect for interaction term
  	quietly zip socialwelfare  i.MCreligion i.relsalience salientCath salientEvan catholic evan, inflate(dwnom1 serviceyears sex vote partyldr) vuong
	margins, dydx(salientCath)
	

* MODEL 3--ROLE OF GOVT
zip ROLE  i.MCreligion i.relsalience i.MCreligion##i.relsalience catholic evan, inflate(dwnom1 serviceyears sex vote partyldr) vuong
	* Calculate average marginal effects for all covariates)
	margins, dydx(*)
	



